﻿Public Class LogAttribute
    Inherits PostSharp.Laos.OnMethodBoundaryAspect

    Private prefijo_ As String
    Private category_ As String

    Property Category() As String
        Get
            Return category_
        End Get
        Set(ByVal value As String)
            category_ = value
        End Set
    End Property

    Public Overrides Sub OnEntry(ByVal eventArgs As PostSharp.Laos.MethodExecutionEventArgs)

    End Sub

    Public Overrides Sub OnExit(ByVal eventArgs As PostSharp.Laos.MethodExecutionEventArgs)
        MyBase.OnExit(eventArgs)
    End Sub


End Class
